Предмет: Информатика,
автор: lgtgth
1. Составить программу, которая запрашивает Имя и приветствует Вас 13 раз.
2. Составить программу- таблицу умножения чисел на 5.
3. Составить программу, которая запрашивала число n и выводила сумму чисел от 4 до n.
4. Составить программу произведения нечетных чисел от 2 до 11.
ЗАДАНИЕ В ПАСКАЛЬ. СДЕЛАЙТЕ ПЖ У МЕНЯ НЕАТЕСТАЦИЯ А Я НИЧЁ НЕ ШАРЮ ПО ПАСКАЛЮ. ПРОСТО ИГРАЮ В ДОТУ И В КС. ОБЕЩАЮ БУДУ УЧИТЬСЯ В 9 КЛАССЕ НО ПОМОГИТЕ МНЕ ПЖ
RenatikPiratik:
ахах)
Ответы
Автор ответа:
1
Ответ:
1.
program (название на английском, пример: program abc);
begin;
var s:string;
Name, Hello: string;
write('Введите ваше имя');
readln(Name);
writeln('Здравствуйте, ',s);
readln(Hello);
for s:=1 to 13 do writeln(Name, ' ', Hello);
end.
2.
program (name);
var i : byte;
begin
for i:=1 to 10 do
writeln('5*',i,'=',5*i);
end.
3.
program (name);
var n,s:integer;
begin
writeln('Введите N');
readln(n);
s:=(4+n)*n div 2;
writeln('s=',s);
end.
4.
program (name);
var x,s: integer;
begin
s:=1;
For x:=2 to 11 do
If x mod 2=1 then
s:=s*x;
writeln('Произведение равно ', s);
end.
Похожие вопросы
Предмет: Русский язык,
автор: JI9IJIKA
Предмет: Русский язык,
автор: настя5866
Предмет: Английский язык,
автор: дизлайк
Предмет: Физика,
автор: lambekovaagmailcom