Предмет: Информатика, автор: lgtgth

1. Составить программу, которая запрашивает Имя и приветствует Вас 13 раз.
2. Составить программу- таблицу умножения чисел на 5.
3. Составить программу, которая запрашивала число n и выводила сумму чисел от 4 до n.
4. Составить программу произведения нечетных чисел от 2 до 11.
ЗАДАНИЕ В ПАСКАЛЬ. СДЕЛАЙТЕ ПЖ У МЕНЯ НЕАТЕСТАЦИЯ А Я НИЧЁ НЕ ШАРЮ ПО ПАСКАЛЮ. ПРОСТО ИГРАЮ В ДОТУ И В КС. ОБЕЩАЮ БУДУ УЧИТЬСЯ В 9 КЛАССЕ НО ПОМОГИТЕ МНЕ ПЖ


RenatikPiratik: ахах)

Ответы

Автор ответа: 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.


lgtgth: а как сделать так чтобы приветствовало 13 раз
RenatikPiratik: исправил
lgtgth: спасибо тебе
Похожие вопросы
Предмет: Русский язык, автор: настя5866