Интерфейс: поля ввода для трёх годов, после вывода результата, подписи, поля для отображения рисунка
Код программы: чтение переменных, использование формул, вывод результата
//Pascal ABC.NET v3.1 сборка 1172
Var
c:char;
begin
readln(c);
if ((c>='a') and (c<='z')) or ((c>='A') and (c<='Z')) or ((c>='А') and (c<='п')) or ((c>='p') and (c<='ё')) then writeln('Буква') else writeln('Символ');
end.
Пример ввода:
ю
Пример вывода:
Буква
У первых название двухкрылки,состав:крылья,усы,брюшко,лапки действия:летать,шевелить усами,охотиться.У вторых название двуххвостки состав: хвосты,усы,лапки,брюшко,крылья действия тоже самое что и у первых
Program n1;
var i,s,n: longint;
begin
s:=0;
readln(n);
for i:=1 to n do s:=s+sqr(i*2);
writeln(s);
end.
Две строки по три ячейки = 6