Другие языки программирования и технологии

помогите решить задачи с циклом по информатике в программе паскаль

1. Напечатать ряд из повторяющихся чисел 20 в виде:

20 20 20 20 20 20 20 20 20 201. Напечатать числа следующим образом:

10 10.4

11 11.4

. .

25 25.42. Напечатайте 20 первых степеней числа 23. Вывести на экран натуральные числа от 1 до 100,
которые при делении на 6 дают в остатке 4, и их количество.

4. Вводятся четыре числа: а, в, с, d. Выведите все
числа на отрезке от а до в, дающие остаток с при делении на d.
Первые два задания я не понял.
Вот что у меня получилось:
===================================

{
Напечатайте 20 первых степеней числа 23.
}

var
a,i: integer;

begin
a := 1;

for i := 1 to 20 do begin
a := a * 23;
write(a,' ');

end;

end.

=====================================
{
Вводятся четыре числа: а, в, с, d. Выведите все
числа на отрезке от а до в, дающие остаток с при делении на d.
}

var
a,b,c,d,i :integer;
begin
write('Enter a: ');
readln(a);
write('Enter b: ');
readln(b);
write('Enter c: ');
readln(c);
write('Enter d: ');
readln(d);

for i := a to b do begin
if (i mod d = c) then write(i,' ');

end;

end.
========================================
{
Вывести на экран натуральные числа от 1 до 100,
которые при делении на 6 дают в остатке 4, и их количество.
}

var
a,sum,i :integer;
begin

sum := 0;
for i := 1 to 100 do begin
if(i > 6) and (i mod 6 = 4) then begin
write(i,' ');
inc(sum);
end;

end;
writeln();
writeln('Количество рано ', sum);

end.
Андрей А
Андрей А
5 430
Лучший ответ
Чем помочь. На каком этапе непонятно? В какой задаче?
MT
Misha Tomachkov
69 563
Прочитайте про форматирование вывода, например тут:
http://ipg.h1.ru/lessons/pascal/les17.html

Потом про циклы, например тут:
http://pas1.ru/cycles

Отстаток от деления A на B = A mod B

Используйте голову (желательно свою) или деньги (желательно чужие) .
Удачи.
Лепшов Олег
Лепшов Олег
11 112