Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Если кто сможет помочь,пишите программу полностью,пожалуйста

Ответ оставил Гость

1)
program privet;
var
a:string;
Begin
writeln(Как тебя зовут?);
readln(a);
writeln(Привет, a);
End.
2)
program arifmet;
var
a,b,c:integer;
writeln(Введите А);
readln(a);
writeln(Введите Б);
readln(b);
c:=(a+b)/2;
writeln(Среднее арифметическое= , c);
End.
Сейчас допишу остальные.