Вывести на экран таблицу квадратов пяти целых нечетных чисел

@Kolia17 · Регистрация: 18.05.2013

Вывести на экран таблицу квадратов пяти целых нечетных чисел. Результат должен быть следующим:
Число: Квадрат:
1 1
3 9
5 25
7 49
9 81

@Shizuka · 18.05.2013, 14:24

Pascal

const
     n=5;
var
   i,v:integer;
begin
     i:=1;
     v:=1;
     while v<=5 do
     begin
          if (i mod 2 <> 0) then
          begin
             v:=v+1;
             writeln(i,' ',i*i)
          end;
          i:=i+1;
     end;
end.

@Kolia17 · 18.05.2013, 17:40 **[ТС]**

Shizuka, Можеш ище 2 задачи развезать ?

@Kolia17 0 / 0 / 0 Регистрация: 18.05.2013 Сообщений: 23
		1
	Вывести на экран таблицу квадратов пяти целых нечетных чисел 18.05.2013, 14:18. Показов 2081. Ответов 2 Метки нет (Все метки) Вывести на экран таблицу квадратов пяти целых нечетных чисел. Результат должен быть следующим: Число: Квадрат: 1 1 3 9 5 25 7 49 9 81 0

@Kolia17 0 / 0 / 0 Регистрация: 18.05.2013 Сообщений: 23
	18.05.2013, 17:40 [ТС]	3
	Shizuka, Можеш ище 2 задачи развезать ? 0

Опции темы

Вывести на экран таблицу квадратов пяти целых нечетных чисел

Решение