Написать программу, которая выводит таблицу квадратов первых n положительных чисел.
10-11 класс
|
(n=9 1, 4,9 .... 81)
var
k,n,i:integer;
begin
writeln('Введите n');
readln(n);
for i:=1 to n do begin
if (i mod 2=0) then
begin
k:=i*i;
write(k,' ');
end;
end;
end.
Другие вопросы из категории
закодировать букву Г, чтобы длина кода была минимальной и допускалось однозначное разбиение кодированного сообщения на буквы?1) 1 2) 11 3) 01 4) 010
Найти массив Z, у которого каждый элемент zi равен
произведению хi*уi, и как будет выглядеть блок схема?
очеень нужно,пожалуйста помогите!
Читайте также
представлен вид экрана во время работы программы, который вам нужно реализовать:
Таблица квадратов
-----------------------------
Число Квадрат
-----------------------------
1 1
2 4
и т.д.
Потом такую же только цикл с предусловием, и еще одну цикл с постусловием
текст.
3)Написать программу, которая определяет является ли слово палиндромом.
4)Написать программу, определяющую какая из букв а или о встречается в тексте первой.
Помогите хотябы одну пожалуйста))Нужно до завтра!))
2. Написать прогрумму,которая выводит на экран, разность значений двух вещественных массивов из 10 элементов.