Program p1; var a,b,c,d:integer; begin writeln('Введите первое число');readln(a); writeln('Введите второе число');readln(b); writeln('Введите третье число');readln(c); if(a>7) then d:=d+1; if(b>7) then d:=d+1; if(c>7) then d:=d+1; writeln('К-во чисел > 7: ',d); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
