Написать программу , которая n раз выводит на экран на одной строке имя и фамилию, на другой строке дату рождения.
Надо сравнить.
Ответы на вопрос
Ответил vardanpogosynozh1m3
0
var first_name, data : string;i : byte; n : integer;
begin write('Введи свое имя и фамилию: '); readln(first_name); write('Ведите свою дату ррождения: '); readln(data); readln(n); for i := 1 to n do write(first_name, ' '); writeln(' '); for i := 1 to n do write(data, ' ');end.
begin write('Введи свое имя и фамилию: '); readln(first_name); write('Ведите свою дату ррождения: '); readln(data); readln(n); for i := 1 to n do write(first_name, ' '); writeln(' '); for i := 1 to n do write(data, ' ');end.
Ответил vardanpogosynozh1m3
0
n же
Ответил gaiig
0
В Паскале не работает это
Ответил vardanpogosynozh1m3
0
у меня все работает. Я же проверил перед тем как отправить...
Ответил gaiig
0
Да? Странно?
Ответил gaiig
0
Странно.
Ответил Аноним
0
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString('Введите имя и фамилию:');
var g:=ReadlnString('Введите год рождения:');
var n:=ReadInteger('Сколько раз повторить вывод?');
loop n do Writeln(s,NewLine,g)
end.
Пример
Введите имя и фамилию: Иванов Сергей
Введите год рождения: 24.06.2001
Сколько раз повторить вывод? 3
Иванов Сергей
24.06.2001
Иванов Сергей
24.06.2001
Иванов Сергей
24.06.2001
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString('Введите имя и фамилию:');
var g:=ReadlnString('Введите год рождения:');
var n:=ReadInteger('Сколько раз повторить вывод?');
loop n do Writeln(s,NewLine,g)
end.
Пример
Введите имя и фамилию: Иванов Сергей
Введите год рождения: 24.06.2001
Сколько раз повторить вывод? 3
Иванов Сергей
24.06.2001
Иванов Сергей
24.06.2001
Иванов Сергей
24.06.2001
Ответил gaiig
0
Хорошо, поищу в интернете по этой теме
Ответил Аноним
0
А если только все на "проходили" строить - в итоге получается выпускник, способный только кнопки в меню выбирать.
Ответил Аноним
0
А зачем искать в Интернет? Я Вам уже все объяснил про LOOP двумя строчками
Ответил gaiig
0
Спасибо
Ответил Аноним
0
Пожалуйста
Новые вопросы
Химия,
2 года назад
Геометрия,
2 года назад
Математика,
8 лет назад
История,
8 лет назад
Алгебра,
9 лет назад