Помогите пожалуйста написать программку в Pascal ABC с оператором FOR.А то

Пример 1. Квадраты чисел от 2-х до 10-и. for x:=2 to 10 do WriteLn(x*x); Пример 2. Латинский алфавит. for ch:='A' to 'Z' do Writeln(ch); Пример 3. Внедрение цикла с downto. for i:=10 downto 1 do WriteLn(i); Пример 4. Внедрение составного оператора. for x:=1 to 10 do begin y:=2*x+3; WriteLn('f(',x,')=',y); end;

Байтимеров Вован · Answer 2 · 2019-08-26 03:18:07+3:00

Байтимеров Вован 2019-08-26 03:18:07

Program for1;
var
    i, n: integer;
begin
    write ('Количество знаков: ');
    readln (n);
writeln('Выводим ', n, 'знаков (*) ')
for i := 1 to n do
        write ('(*) ');
readln
end.

program for2; //программка, которая будет выводить на экран квадраты чисел от 1 до 10.
uses crt;
var N:integer;
begin
clrscr;
   For N:=1 To 10 Do
   writeln (sqr(N));
readln
end.

Egor Kostjanov 2019-08-26 03:24:23

А ещё варианты?

Роман Колибабчук 2019-08-26 03:29:47

ок

Алиса Запрометова 2019-08-26 03:38:16

сейчас напишу

Карина Баковцева 2019-08-26 03:40:10

воот...)

Jevelina 2019-08-26 03:21:48

если у Вас версия Паскаля ABC, то пустое readlnможно не писать

О проекте

Помогите пожалуйста написать программку в Pascal ABC с оператором FOR.А то

Добро пожаловать!