Склавиатуры последовательно вводятся однозначные числа до тех пор пока не будет введено двухзначное число.найди сумму квадратов однозначных чисел (написать программу на языке паслкаль)

282

395

Посмотреть ответы 2

Ответы на вопрос:

Stan0

Информатика

4,7(86 оценок)

Label m1; var a: array[1..100]of integer; i,b,n: integer; c: real; beginfor i: =1 to 100 dobeginread(a[i]); if a[i]> 9 then goto m1; n: =i; end; m1: for i: =1to n dobeginb: =sqr(a[i]); writeln('квадрат',' ',i,' ','числа=',' ',b); end; end.

zana06191

Информатика

4,4(72 оценок)

потому что каждой клавише может соответствовать несколько символов, к примеру каждой буквенной клавише соответствует минимум 4 символа: "к к r r", "t t е е" и т.д.